home *** CD-ROM | disk | FTP | other *** search
/ Java for 3D & VRML Worlds / Java for 3d and VRML Worlds.iso / world / jumanji / main.wrl < prev    next >
Text File  |  1996-10-16  |  15KB  |  720 lines

  1. #VRML V2.0 utf8
  2.  
  3. Background {
  4.   backUrl [ "texture/COMP2.JPG" ]
  5. #  bottomUrl [ "texture/COMP2.JPG" ]
  6.   frontUrl [ "texture/COMP2.JPG" ]
  7.   leftUrl [ "texture/COMP2.JPG" ]
  8.   rightUrl [ "texture/COMP2.JPG" ]
  9. #  topUrl [ "texture/COMP2.JPG" ]
  10. }
  11.  
  12. NavigationInfo {
  13.   headlight FALSE
  14. }
  15.  
  16. DEF CHANGECAM Transform {
  17.   children [
  18.     DEF CAMERA Viewpoint {
  19.       position 0 50 200
  20.     }
  21.   ]
  22. }
  23.  
  24. DEF PROX ProximitySensor {
  25.   center 0 0 0
  26.   size 500 500 500
  27.   enabled TRUE
  28. }
  29.  
  30. DEF VERTBOX Transform {
  31.   children [
  32.     DEF HORIZBOX Transform {
  33.         children [
  34.  
  35.             DEF leftBox Transform {
  36.               translation -15 2.5 0
  37.               children [
  38.                 Inline { url "left.wrl" }
  39.               ]
  40.             }
  41.  
  42.             DEF rightBox Transform {
  43.               translation 15 2.5 0
  44.               children [
  45.                 Inline { url "right.wrl" }
  46.               ]
  47.             }
  48.  
  49.             DEF centerBox Transform {
  50.               children [
  51.                 Inline { url "center.wrl" }
  52.               ]
  53.             }
  54.  
  55. Transform {
  56.   scale 1.2 1.2 1.2 
  57.   children [
  58.             Transform {
  59.               translation -15 4 -20
  60.               children [
  61. #                Viewpoint {
  62. #                  position    15.5 0 30
  63. #                  fieldOfView 0.785398
  64.                 }
  65.                 Shape {
  66.                   appearance Appearance {
  67.                     material DEF gemMat Material {
  68.                       diffuseColor  0 1 0
  69.                       specularColor 1 1 0
  70.                       shininess     1
  71.                     }
  72.                   }
  73.                   geometry IndexedFaceSet {
  74.                     coord Coordinate {
  75.                       point [
  76.                         11.35 -4 19.8,
  77.                         11.35 -4 20.8,
  78.                         12.35 -3.5 20.8,
  79.                         12.35 -3.5 19.8,
  80.                         11.85 -4 18.3,
  81.                         13.35 -4 16.8,
  82.                         14.85 -3.5 17.3,
  83.                         14.85 -4 16.3,
  84.                         15.85 -4 16.3,
  85.                         15.85 -3.5 17.3,
  86.                         17.35 -4 16.8,
  87.                         18.85 -4 18.3,
  88.                         18.35 -3.5 19.8,
  89.                         19.35 -4 19.8,
  90.                         19.35 -4 20.8,
  91.                         18.35 -3.5 20.8,
  92.                         18.85 -4 22.3,
  93.                         17.35 -4 23.8,
  94.                         15.85 -3.5 23.3,
  95.                         15.85 -4 24.3,
  96.                         14.85 -4 24.3,
  97.                         14.85 -3.5 23.3,
  98.                         13.35 -4 23.8,
  99.                         11.85 -4 22.3,
  100.                         13.85 -3 20.3,
  101.                         15.35 -3 18.8,
  102.                         16.85 -3 20.3,
  103.                         15.35 -3 21.8
  104.                       ]
  105.                     }
  106.                     coordIndex [
  107.                       0, 1, 2, 3, -1,
  108.                       4, 0, 3, -1,
  109.                       5, 4, 3, 6, -1,
  110.                       7, 5, 6, -1,
  111.                       8, 7, 6, 9, -1,
  112.                       10, 8, 9, -1,
  113.                       11, 10, 9, 12, -1,
  114.                       13, 11, 12, -1,
  115.                       14, 13, 12, 15, -1,
  116.                       16, 14, 15, -1,
  117.                       17, 16, 15, 18, -1,
  118.                       19, 17, 18, -1,
  119.                       20, 19, 18, 21, -1,
  120.                       22, 20, 21, -1,
  121.                       23, 22, 21, 2, -1,
  122.                       1, 23, 2, -1,
  123.                       3, 2, 24, -1,
  124.                       6, 3, 24, 25, -1,
  125.                       9, 6, 25, -1,
  126.                       12, 9, 25, 26, -1,
  127.                       15, 12, 26, -1,
  128.                       18, 15, 26, 27, -1,
  129.                       21, 18, 27, -1,
  130.                       2, 21, 27, 24, -1,
  131.                       24, 27, 26, 25, -1
  132.                     ]
  133.                     normalPerVertex TRUE
  134.                     # ccw     FALSE
  135.                     # solid   FALSE
  136.                     convex TRUE
  137.                     creaseAngle 0.5
  138.                   }
  139.                 }
  140.               ]
  141.             }
  142.   ]
  143. }
  144.         ]
  145.     }
  146.     ]
  147. }
  148.  
  149.         DEF DICE Transform {
  150.             translation -25 10 0
  151.             scale 7 7 7
  152.             children [
  153.                 DEF diceTS TouchSensor { }
  154.                 Shape {
  155.                     appearance Appearance {
  156.                         material Material {
  157.                             emissiveColor 0.7 0.7 0.7
  158.                         }
  159.                         texture ImageTexture {
  160.                             url [ "texture/alldice.gif" ]
  161.                         }
  162.                     }
  163.                     geometry IndexedFaceSet {
  164.                         coord Coordinate3 {
  165.                             point [
  166.                                 .1 .1 .1,
  167.                                 .1 .1 -.1,
  168.                                 .1 -.1 .1,
  169.                                 .1 -.1 -.1,
  170.                                 -.1 .1 .1,
  171.                                 -.1 .1 -.1,
  172.                                 -.1 -.1 .1,
  173.                                 -.1 -.1 -.1
  174.                             ]
  175.                         }
  176.                         texCoord TextureCoordinate {
  177.                             point [
  178.                                 0.0 0.5,
  179.                                 0.333 0.5,
  180.                                 0.333 1.0,
  181.                                 0.0 1.0,
  182.                             ]
  183.                         }
  184.                         coordIndex [
  185.                             2, 0, 4, 6, -1,
  186.                         ]
  187.                         texCoordIndex [
  188.                             1, 2, 3, 0, -1,
  189.                         ]
  190.                     }
  191.                 }
  192.                 Shape {
  193.                     appearance Appearance {
  194.                         material Material {
  195.                             emissiveColor 0.7 0.7 0.7
  196.                         }
  197.                         texture ImageTexture {
  198.                             url [ "texture/alldice.gif" ]
  199.                         }
  200.                     }
  201.                     geometry IndexedFaceSet {
  202.                         coord Coordinate3 {
  203.                             point [
  204.                                 .1 .1 .1,
  205.                                 .1 .1 -.1,
  206.                                 .1 -.1 .1,
  207.                                 .1 -.1 -.1,
  208.                                 -.1 .1 .1,
  209.                                 -.1 .1 -.1,
  210.                                 -.1 -.1 .1,
  211.                                 -.1 -.1 -.1
  212.                             ]
  213.                         }
  214.                         texCoord TextureCoordinate {
  215.                             point [
  216.                                 0.333 0.5,
  217.                                 0.666 0.5,
  218.                                 0.666 1.0,
  219.                                 0.333 1.0
  220.  
  221.                             ]
  222.                         }
  223.                         coordIndex [
  224.                             0, 1, 5, 4, -1,
  225.                         ]
  226.                         texCoordIndex [
  227.                             1, 2, 3, 0, -1,
  228.                         ]
  229.                     }
  230.                 }
  231.                 Shape {
  232.                     appearance Appearance {
  233.                         material Material {
  234.                             emissiveColor 0.7 0.7 0.7
  235.                         }
  236.                         texture ImageTexture {
  237.                             url [ "texture/alldice.gif" ]
  238.                         }
  239.                     }
  240.                     geometry IndexedFaceSet {
  241.                         coord Coordinate3 {
  242.                             point [
  243.                                 .1 .1 .1,
  244.                                 .1 .1 -.1,
  245.                                 .1 -.1 .1,
  246.                                 .1 -.1 -.1,
  247.                                 -.1 .1 .1,
  248.                                 -.1 .1 -.1,
  249.                                 -.1 -.1 .1,
  250.                                 -.1 -.1 -.1
  251.                             ]
  252.                         }
  253.                         texCoord TextureCoordinate {
  254.                             point [
  255.                                 0.666 0.5,
  256.                                 1.0 0.5,
  257.                                 1.0 1.0,
  258.                                 0.666 1.0
  259.                             ]
  260.                         }
  261.                         coordIndex [
  262.                             2, 3, 1, 0, -1,
  263.                         ]
  264.                         texCoordIndex [
  265.                             0, 1, 2, 3, -1,
  266.                         ]
  267.                     }
  268.                 }
  269.                 Shape {
  270.                     appearance Appearance {
  271.                         material Material {
  272.                             emissiveColor 0.7 0.7 0.7
  273.                         }
  274.                         texture ImageTexture {
  275.                             url [ "texture/alldice.gif" ]
  276.                         }
  277.                     }
  278.                     geometry IndexedFaceSet {
  279.                         coord Coordinate3 {
  280.                             point [
  281.                                 .1 .1 .1,
  282.                                 .1 .1 -.1,
  283.                                 .1 -.1 .1,
  284.                                 .1 -.1 -.1,
  285.                                 -.1 .1 .1,
  286.                                 -.1 .1 -.1,
  287.                                 -.1 -.1 .1,
  288.                                 -.1 -.1 -.1
  289.                             ]
  290.                         }
  291.                         texCoord TextureCoordinate {
  292.                             point [
  293.                                 0.0 0.0,
  294.                                 0.333 0.0,
  295.                                 0.333 0.5,
  296.                                 0.0 0.5
  297.                             ]
  298.                         }
  299.                         coordIndex [
  300.                             4, 5, 7, 6, -1,
  301.                         ]
  302.                         texCoordIndex [
  303.                             2, 3, 0, 1, -1,
  304.                         ]
  305.                     }
  306.                 }
  307.                 Shape {
  308.                     appearance Appearance {
  309.                         material Material {
  310.                             emissiveColor 0.7 0.7 0.7
  311.                         }
  312.                         texture ImageTexture {
  313.                             url [ "texture/alldice.gif" ]
  314.                         }
  315.                     }
  316.                     geometry IndexedFaceSet {
  317.                         coord Coordinate3 {
  318.                             point [
  319.                                 .1 .1 .1,
  320.                                 .1 .1 -.1,
  321.                                 .1 -.1 .1,
  322.                                 .1 -.1 -.1,
  323.                                 -.1 .1 .1,
  324.                                 -.1 .1 -.1,
  325.                                 -.1 -.1 .1,
  326.                                 -.1 -.1 -.1
  327.                             ]
  328.                         }
  329.                         texCoord TextureCoordinate {
  330.                             point [
  331.                                 0.333 0.0,
  332.                                 0.666 0.0,
  333.                                 0.666 0.5,
  334.                                 0.333 0.5
  335.                             ]
  336.                         }
  337.                         coordIndex [
  338.                             5, 1, 3, 7, -1,
  339.                         ]
  340.                         texCoordIndex [
  341.                             2, 3, 0, 1, -1,
  342.                         ]
  343.                     }
  344.                 }
  345.                 Shape {
  346.                     appearance Appearance {
  347.                         material Material {
  348.                             emissiveColor 0.7 0.7 0.7
  349.                         }
  350.                         texture ImageTexture {
  351.                             url [ "texture/alldice.gif" ]
  352.                         }
  353.                     }
  354.                     geometry IndexedFaceSet {
  355.                         coord Coordinate3 {
  356.                             point [
  357.                                 .1 .1 .1,
  358.                                 .1 .1 -.1,
  359.                                 .1 -.1 .1,
  360.                                 .1 -.1 -.1,
  361.                                 -.1 .1 .1,
  362.                                 -.1 .1 -.1,
  363.                                 -.1 -.1 .1,
  364.                                 -.1 -.1 -.1
  365.                             ]
  366.                         }
  367.                         texCoord TextureCoordinate {
  368.                             point [
  369.                                 0.666 0.0,
  370.                                 1.0 0.0,
  371.                                 1.0 0.5,
  372.                                 0.666 0.5
  373.                             ]
  374.                         }
  375.                         coordIndex [
  376.                             6, 7, 3, 2, -1
  377.                         ]
  378.                         texCoordIndex [
  379.                             1, 2, 3, 0, -1,
  380.                         ]
  381.                     }
  382.                 }
  383.             ]
  384.         }
  385.  
  386.         Billboard {
  387.             children [
  388.                 DEF LionT Transform {
  389.                     translation 999 999 999
  390.                     children [
  391.                         Shape {
  392.                             appearance Appearance {
  393.                                 material Material {
  394.                                     emissiveColor 0.8 0.8 0.8
  395.                                 }
  396.                                 texture ImageTexture {
  397.                                     url [ "texture/lionanm5.gif" ]
  398.                                 }
  399.                             }
  400.                             geometry IndexedFaceSet {
  401.                                 coord Coordinate {
  402.                                     point [
  403.                                         -2.25 2.25 0,
  404.                                         -2.25 -2.25 0,
  405.                                         2.25 -2.25 0,
  406.                                         2.25 2.25 0,
  407.                                     ]
  408.                                 }
  409.                                 coordIndex [ 0, 1, 2, 3, -1, 0, 3, 2, 1, -1, ]
  410.                             }
  411.                         }
  412.                     ]
  413.                 }
  414.             ]
  415.         }
  416.  
  417.  
  418.  
  419. DEF oi OrientationInterpolator {
  420.   key [ 0,  1 ]
  421.   keyValue [ 0 0 1 -3.14, 0 0 1 -0.001]
  422. }
  423.  
  424. DEF oi2 OrientationInterpolator {
  425.   key [ 0, 1 ]
  426.   keyValue [ 0 0 1 3.14, 0 0 1 0.001]
  427. }
  428.  
  429. DEF vertboxOI OrientationInterpolator {
  430.   key [ 0, 1 ]
  431.   keyValue [ 1 0 0 1.57, 1 0 0 0 ]
  432. }
  433.  
  434. DEF horizboxOI OrientationInterpolator {
  435.   key [ 0, 1 ]
  436.   keyValue [ 0 1 0 -1.57, 1 0 0 0 ]
  437. }
  438.  
  439. DEF boxMove PositionInterpolator {
  440.   key [ 0, 1 ]
  441.   keyValue [ 0 50 150, 0 0 0 ]
  442. }
  443.  
  444. DEF cameraMove PositionInterpolator {
  445.   key [ 0, 0.3, 1 ]
  446.   keyValue [ 0 50 200, 0 50 200, 0 2 15 ]
  447. }
  448.  
  449. DEF boxOpen TimeSensor {
  450.   cycleInterval 5
  451.   enabled TRUE
  452.   loop FALSE
  453.   stopTime -1
  454. }
  455.  
  456. DEF masterTime TimeSensor {
  457.   cycleInterval 0.5
  458.   enabled TRUE
  459.   loop TRUE
  460.   stopTime -1
  461. }
  462.  
  463. DEF gemGlowTime TimeSensor {
  464.   cycleInterval 2
  465.   enabled TRUE
  466.   loop TRUE
  467.   stopTime -1
  468. }
  469.  
  470. DEF OPENSCRIPT Script {
  471.   url "open.class"
  472.   eventIn SFTime tick
  473.   eventIn SFVec3f sandInput
  474.   eventIn SFVec3f quakeInput
  475.   eventIn SFFloat disasterFraction
  476.   eventIn SFTime setDisaster
  477.   eventIn SFVec3f personMoved
  478.   eventOut SFTime triggerOpen
  479.   eventOut SFVec3f camMove
  480.   eventOut SFFloat sandFraction
  481.   eventOut SFFloat lionFraction
  482.   eventOut SFFloat quakeFraction
  483.   eventOut MFVec3f lionPath
  484. }
  485.  
  486. DEF gemGlowSI ScalarInterpolator {
  487.   key [ 0, 0.5, 1 ]
  488.   keyValue [ 0.2, 1, 0.2 ]
  489. }
  490.  
  491. DEF diceDropTime TimeSensor {
  492.   cycleInterval 1.3
  493.   enabled TRUE
  494.   loop FALSE
  495.   stopTime -1
  496. }
  497.  
  498. DEF disasterTime TimeSensor {
  499.   cycleInterval 20
  500.   enabled TRUE
  501.   loop FALSE
  502.   stopTime -1
  503. }
  504.  
  505. DEF diceDropPI PositionInterpolator {
  506.   key [ 0, 0.01, 0.02, 0.03, 0.04, 0.05, 0.06, 0.07, 0.08, 0.09, 0.1, 0.95, 1 ]
  507.   keyValue [ -25 10 0, -25 9.9 0, -25 9.6 0, -25 9.1 0, -25 8.4 0, -25 7.5 0,
  508.              -25 6.4 0, -25 5.1 0, -25 3.6 0, -25 1.9 0, -25 0 0 , -25 0 0, -25 10 0]
  509.  
  510. DEF sandPI PositionInterpolator {
  511.   key [ 0, 0.98, 1 ]
  512.   keyValue [ 0 0 0, 0 -1 0, 0 0 0 ]
  513. }
  514.  
  515. DEF quakePI PositionInterpolator {
  516.   key [ 0
  517. 0.0126582
  518. 0.0253165
  519. 0.0379747
  520. 0.0506329
  521. 0.0632911
  522. 0.0759494
  523. 0.0886076
  524. 0.101266
  525. 0.113924
  526. 0.126582
  527. 0.139241
  528. 0.151899
  529. 0.164557
  530. 0.177215
  531. 0.189873
  532. 0.202532
  533. 0.21519
  534. 0.227848
  535. 0.240506
  536. 0.253165
  537. 0.265823
  538. 0.278481
  539. 0.291139
  540. 0.303797
  541. 0.316456
  542. 0.329114
  543. 0.341772
  544. 0.35443
  545. 0.367089
  546. 0.379747
  547. 0.392405
  548. 0.405063
  549. 0.417722
  550. 0.43038
  551. 0.443038
  552. 0.455696
  553. 0.468354
  554. 0.481013
  555. 0.493671
  556. 0.506329
  557. 0.518987
  558. 0.531646
  559. 0.544304
  560. 0.556962
  561. 0.56962
  562. 0.582278
  563. 0.594937
  564. 0.607595
  565. 0.620253
  566. 0.632911
  567. 0.64557
  568. 0.658228
  569. 0.670886
  570. 0.683544
  571. 0.696203
  572. 0.708861
  573. 0.721519
  574. 0.734177
  575. 0.746835
  576. 0.759494
  577. 0.772152
  578. 0.78481
  579. 0.797468
  580. 0.810127
  581. 0.822785
  582. 0.835443
  583. 0.848101
  584. 0.860759
  585. 0.873418
  586. 0.886076
  587. 0.898734
  588. 0.911392
  589. 0.924051
  590. 0.936709
  591. 0.949367
  592. 0.962025
  593. 0.974684
  594. 0.987342
  595. 1 ]
  596.   keyValue [ 0 -0.496516 0,
  597. 0 0.1532 0,
  598. 0 -0.488295 0,
  599. 0 -0.172912 0,
  600. 0 0.191686 0,
  601. 0 -0.318189 0,
  602. 0 0.356608 0,
  603. 0 -0.495612 0,
  604. 0 -0.020344 0,
  605. 0 -0.00910741 0,
  606. 0 -0.311154 0,
  607. 0 0.12913 0,
  608. 0 0.344839 0,
  609. 0 0.0340245 0,
  610. 0 -0.371282 0,
  611. 0 0.106329 0,
  612. 0 0.330617 0,
  613. 0 0.25197 0,
  614. 0 -0.267307 0,
  615. 0 0.293995 0,
  616. 0 0.342842 0,
  617. 0 0.408217 0,
  618. 0 0.277394 0,
  619. 0 -0.134701 0,
  620. 0 0.377156 0,
  621. 0 0.436524 0,
  622. 0 -0.466038 0,
  623. 0 -0.440386 0,
  624. 0 -0.386561 0,
  625. 0 -0.271212 0,
  626. 0 0.490181 0,
  627. 0 0.205346 0,
  628. 0 0.316715 0,
  629. 0 0.0991545 0,
  630. 0 -0.222471 0,
  631. 0 0.376943 0,
  632. 0 0.330477 0,
  633. 0 -0.438316 0,
  634. 0 -0.296113 0,
  635. 0 -0.378275 0,
  636. 0 0.138846 0,
  637. 0 0.0539737 0,
  638. 0 0.279931 0,
  639. 0 -0.140841 0,
  640. 0 -0.491834 0,
  641. 0 0.328036 0,
  642. 0 -0.0417039 0,
  643. 0 0.315968 0,
  644. 0 0.0965228 0,
  645. 0 0.412314 0,
  646. 0 0.479401 0,
  647. 0 -0.285086 0,
  648. 0 0.141429 0,
  649. 0 0.325116 0,
  650. 0 -0.263615 0,
  651. 0 0.383389 0,
  652. 0 0.401263 0,
  653. 0 0.0898543 0,
  654. 0 -0.0661085 0,
  655. 0 0.48989 0,
  656. 0 -0.0647041 0,
  657. 0 -0.43368 0,
  658. 0 -0.478475 0,
  659. 0 -0.247765 0,
  660. 0 0.0600388 0,
  661. 0 0.169893 0,
  662. 0 0.432566 0,
  663. 0 -0.309149 0,
  664. 0 -0.0836819 0,
  665. 0 0.201899 0,
  666. 0 0.0521317 0,
  667. 0 -0.176298 0,
  668. 0 -0.478058 0,
  669. 0 0.259473 0,
  670. 0 0.0762267 0,
  671. 0 0.116431 0,
  672. 0 -0.031029 0,
  673. 0 0.0321631 0,
  674. 0 0.00423124 0,
  675. 0 0 0,
  676.  
  677.  
  678. ]
  679. }
  680.  
  681.  
  682. DEF lionPI PositionInterpolator {
  683.   key [ 0, 0.02, 0.98, 1 ]
  684. }
  685.  
  686. ROUTE boxOpen.fraction_changed TO oi.set_fraction
  687. ROUTE boxOpen.fraction_changed TO oi2.set_fraction
  688. ROUTE oi.value_changed TO leftBox.set_rotation
  689. ROUTE oi2.value_changed TO rightBox.set_rotation
  690. ROUTE OPENSCRIPT.triggerOpen TO boxOpen.set_startTime
  691. ROUTE masterTime.cycleTime TO OPENSCRIPT.tick
  692. ROUTE boxOpen.fraction_changed TO vertboxOI.set_fraction
  693. ROUTE vertboxOI.value_changed TO VERTBOX.set_rotation
  694. ROUTE boxOpen.fraction_changed TO horizboxOI.set_fraction
  695. ROUTE horizboxOI.value_changed TO HORIZBOX.set_rotation
  696. ROUTE boxOpen.fraction_changed TO boxMove.set_fraction
  697. ROUTE boxMove.value_changed TO VERTBOX.set_translation
  698. ROUTE boxOpen.fraction_changed TO cameraMove.set_fraction
  699. ROUTE cameraMove.value_changed TO CAMERA.set_position
  700. ROUTE gemGlowTime.fraction_changed TO gemGlowSI.set_fraction
  701. ROUTE gemGlowSI.value_changed TO gemMat.set_ambientIntensity
  702. ROUTE diceTS.touchTime TO diceDropTime.set_startTime
  703. ROUTE disasterTime.fraction_changed TO diceDropPI.set_fraction
  704. ROUTE diceDropPI.value_changed TO DICE.set_translation
  705. ROUTE diceTS.touchTime TO disasterTime.set_startTime
  706.  
  707. ROUTE disasterTime.cycleTime TO OPENSCRIPT.setDisaster
  708. ROUTE disasterTime.fraction_changed TO OPENSCRIPT.disasterFraction
  709. ROUTE OPENSCRIPT.sandFraction TO sandPI.set_fraction
  710. ROUTE sandPI.value_changed TO OPENSCRIPT.sandInput
  711. ROUTE OPENSCRIPT.camMove TO CHANGECAM.set_translation
  712. ROUTE PROX.position_changed TO OPENSCRIPT.personMoved
  713. ROUTE OPENSCRIPT.lionPath TO lionPI.set_keyValue
  714. ROUTE OPENSCRIPT.lionFraction TO lionPI.set_fraction
  715. ROUTE lionPI.value_changed TO LionT.set_translation
  716. ROUTE quakePI.value_changed TO OPENSCRIPT.quakeInput
  717. ROUTE OPENSCRIPT.quakeFraction TO quakePI.set_fraction
  718.  
  719.